(texinfo-anchor): Don't delete a non-speace after the @anchor command.

diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 101737227b2cd90f1717ee659c7d8b5b486506a1..91fa154933b8918cb692469da03a042726820020 100644 (file)
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -1143,7 +1143,8 @@ Leave point after argument."
   (let (anchor-string 
         (here (- (point) 7))  ; save location of beginning of `@anchor'
         (arg (texinfo-parse-arg-discard)))
-    (delete-char 1)           ; since a space is left after -discard
+    (if (looking-at " ")      ; since a space may be left after -discard
+      (delete-char 1))
     (forward-paragraph) 
     (let ((end (point)))
       (if (save-excursion